5 POKE808,251:PRINTCHR$(8):PRINTCHR$(142):REM****WRITTEN BY JONATHAN GOURD*****
10 X=0.
90 IFA=0THEN A=1:LOAD"VOICE",8,1
100 POKE51041,3*16:POKE51022,5:POKE51036,110:POKE51017,2:POKE51031,0
110 SYS50320
115 PRINT"[147]"
120 (null)"VOICE WORDS",8
124 POKE53280,14:POKE53281,6
125 PRINT"[147][154]    **** COMMODORE 64 BASIC V2 ****":PRINT" 64K RAM SYSTEM";
126 PRINT"  38911 BASIC BYTES FREE":PRINT"READY."
130 POKEG,32:(null)X
131 IFX=2THENX=-1
132 X=X+1
133 (null)1:(null)7
139 PRINT"[147][146]    **** COMMODORE 64 BASIC V2 ****":PRINT" 64K RAM SYSTEM";
140 PRINT"  38911 BASIC BYTES FREE":PRINT"READY."
141 PRINT" [157]";
142 FORG=1024TO1984STEP40:IFPEEK(G)=160THEN GOTO144
143 NEXTG
144 FORM=1TO 80
145 GETL$
146 IFL$<>""THEN GOTO 130
147 NEXTM
148 POKEG,32
149 FORM=1TO 80
150 GETL$
151 IFL$<>""THEN GOTO 130
152 NEXTM
153 POKEG,160
154 GOTO144
160 REM*****WRITTEN BY JONATHAN GOURD****